﻿Public Class ClsTQuantitySum
    '对应表：T_QuantitySum

    Private m_AcctSumId As Integer
    Private m_WorkPeriod As String
    Private m_AcctCode As String
    Private m_AcctLevel As Integer
    Private m_IfLastLevel As Integer
    Private m_AcctName As String
    Private m_CreditSum As Single
    Private m_CreditPrice As Single
    Private m_CreditSumMoney As Decimal
    Private m_DebitSum As Single
    Private m_DebitSumPrice As Single
    Private m_DebitSumMoney As Decimal


    Public Property AcctSumId As Integer
        Get
            Return m_AcctSumId
        End Get
        Set(value As Integer)
            m_AcctSumId = value
        End Set
    End Property

    Public Property WorkPeriod As String
        Get
            Return m_WorkPeriod
        End Get
        Set(value As String)
            m_WorkPeriod = value
        End Set
    End Property

    Public Property AcctCode As String
        Get
            Return m_AcctCode
        End Get
        Set(value As String)
            m_AcctCode = value
        End Set
    End Property

    Public Property AcctLevel As Integer
        Get
            Return m_AcctLevel
        End Get
        Set(value As Integer)
            m_AcctLevel = value
        End Set
    End Property

    Public Property IfLastLevel As Integer
        Get
            Return m_IfLastLevel
        End Get
        Set(value As Integer)
            m_IfLastLevel = value
        End Set
    End Property

    Public Property AcctName As String
        Get
            Return m_AcctName
        End Get
        Set(value As String)
            m_AcctName = value
        End Set
    End Property

    Public Property CreditSum As Single
        Get
            Return m_CreditSum
        End Get
        Set(value As Single)
            m_CreditSum = value
        End Set
    End Property

    Public Property CreditPrice As Single
        Get
            Return m_CreditPrice
        End Get
        Set(value As Single)
            m_CreditPrice = value
        End Set
    End Property

    Public Property CreditSumMoney As Decimal
        Get
            Return m_CreditSumMoney
        End Get
        Set(value As Decimal)
            m_CreditSumMoney = value
        End Set
    End Property

    Public Property DebitSum As Single
        Get
            Return m_DebitSum
        End Get
        Set(value As Single)
            m_DebitSum = value
        End Set
    End Property

    Public Property DebitSumPrice As Single
        Get
            Return m_DebitSumPrice
        End Get
        Set(value As Single)
            m_DebitSumPrice = value
        End Set
    End Property

    Public Property DebitSumMoney As Decimal
        Get
            Return m_DebitSumMoney
        End Get
        Set(value As Decimal)
            m_DebitSumMoney = value
        End Set
    End Property

End Class
